home *** CD-ROM | disk | FTP | other *** search
/ The CICA Windows Explosion! / The CICA Windows Explosion! - Disc 2.iso / misc / gs261exe.zip / unprot.ps < prev    next >
Text File  |  1993-05-13  |  2KB  |  58 lines
  1. %    Copyright (C) 1991, 1992 Aladdin Enterprises.  All rights reserved.
  2. %
  3. % This file is part of Ghostscript.
  4. %
  5. % Ghostscript is distributed in the hope that it will be useful, but
  6. % WITHOUT ANY WARRANTY.  No author or distributor accepts responsibility
  7. % to anyone for the consequences of using it or for whether it serves any
  8. % particular purpose or works at all, unless he says so in writing.  Refer
  9. % to the Ghostscript General Public License for full details.
  10. %
  11. % Everyone is granted permission to copy, modify and redistribute
  12. % Ghostscript, but only under the conditions described in the Ghostscript
  13. % General Public License.  A copy of this license is supposed to have been
  14. % given to you along with Ghostscript so you can know your rights and
  15. % responsibilities.  It should be in a file named COPYING.  Among other
  16. % things, the copyright notice and this notice must be preserved on all
  17. % copies.
  18.  
  19. % Disable all access checks.  This is useful for printing out
  20. % eexec-encrypted Type 1 fonts, and similar purposes.
  21.  
  22. systemdict wcheck not
  23.  { (Please restart Ghostscript with the -dWRITESYSTEMDICT switch.\n) print
  24.    stop
  25.  } if
  26.  
  27. systemdict begin
  28.    /readonly. /readonly load def
  29.    /executeonly. /executeonly load def
  30.    /noaccess. /noaccess load def
  31.    /readonly { } odef
  32.    /readonly.. /readonly load def
  33.    /executeonly { } odef
  34.    /executeonly.. /executeonly load def
  35.    /noaccess { } odef
  36.    /noaccess.. /noaccess load def
  37. end
  38.  
  39. % Disable the access checks.
  40.  
  41. /unprot
  42.  { systemdict begin
  43.    /readonly /readonly.. load def
  44.    /executeonly /executeonly.. load def
  45.    /noaccess /noaccess.. load def
  46.    end
  47.  } bind def
  48.  
  49. % Re-enable the access checks.
  50.  
  51. /reprot
  52.  { systemdict begin
  53.    /readonly /readonly. load def
  54.    /executeonly /executeonly. load def
  55.    /noaccess /noaccess. load def
  56.    end
  57.  } bind def
  58.